home *** CD-ROM | disk | FTP | other *** search
/ 1st Multimedia Mac Shareware / Multimedia Shareware CD-ROM - BetaCorp.iso / Food&Drink / Invitation list / stack_-1.xml < prev   
Encoding:
Extensible Markup Language  |  1992-08-10  |  2.7 KB  |  24 lines
  1. <?xml version="1.0" encoding="utf-8" ?>
  2. <!DOCTYPE stack PUBLIC "-//Apple, Inc.//DTD stack V 2.0//EN" "" >
  3. <stack>
  4.     <name>in</name>
  5.     <id>-1</id>
  6.     <cardCount>3</cardCount>
  7.     <cardID>3620</cardID>
  8.     <listID>2407</listID>
  9.     <cantModify><false /></cantModify>
  10.     <cantDelete><false /></cantDelete>
  11.     <cantAbort><false /></cantAbort>
  12.     <cardSize>
  13.         <width>512</width>
  14.         <height>342</height>
  15.     </cardSize>
  16.     <script>on startUp
  17. getHomeInfo
  18. pass startUp -- to a startUp XCMD, if present
  19. end startUp
  20.  
  21. on resume
  22. getHomeInfo
  23. pass resume -- to a resume XCMD, if present
  24. end resume
  25.  
  26. on getHomeInfo
  27. global stacks,applications,documents,userName
  28. set lockScreen to true
  29. set lockMessages to true
  30. push this card
  31. go to card "User Preferences" of stack "Home"
  32. put card field "User Name" into userName
  33. set userLevel to card field "User Level"
  34. set powerKeys to the hilite of button "Power Keys"
  35. set textArrows to the hilite of button "Text Arrows"
  36. set blindTyping to the hilite of button "Blind Typing"
  37. put field "paths" of card "stacks" into stacks
  38. put field "paths" of card "applications" into applications
  39. put field "paths" of card "documents" into documents
  40. pop card
  41. set lockScreen to false
  42. set lockMessages to false
  43. end getHomeInfo
  44.  
  45. on searchScript pattern,stackName -- search all scripts of a stack
  46. set lockMessages to true
  47. if stackName is not empty then go to stack stackName
  48.  
  49. if the script of this stack contains pattern
  50. then edit script of this stack
  51.  
  52. repeat with i = 1 to the number of bkgnds
  53. go to card 1 of bkgnd i
  54. if the script of this bkgnd contains pattern
  55. then edit script of bkgnd
  56.  
  57. repeat with j = 1 to the number of bkgnd buttons
  58. if the script of bkgnd button j contains pattern
  59. then edit script of bkgnd button j
  60. end repeat
  61.  
  62. repeat with j = 1 to the number of bkgnd fields
  63. if the script of bkgnd field j contains pattern
  64. then edit script of bkgnd field j
  65. end repeat
  66.  
  67. end repeat
  68.  
  69. repeat with i = 1 to the number of cards
  70. go card i
  71. if the script of this card contains pattern
  72. then edit script of this card
  73.  
  74. repeat with j = 1 to the number of card buttons
  75. if the script of card button j contains pattern
  76. then edit script of card button j
  77. end repeat
  78.  
  79. repeat with j = 1 to the number of card fields
  80. if the script of card field j contains pattern
  81. then edit script of card field j
  82. end repeat
  83.  
  84. end repeat
  85. set lockMessages to false
  86. end searchScript
  87.  
  88. </script>
  89.     <background id="2277" file="background_2277.xml" name="title" />
  90.     <background id="2708" file="background_2708.xml" name="card" />
  91.     <background id="5957" file="background_5957.xml" name="title" />
  92.     <card id="3620" file="card_3620.xml" marked="false" name="About" owner="2277" />
  93.     <card id="5657" file="card_5657.xml" marked="false" name="" owner="2708" />
  94.     <card id="6579" file="card_6579.xml" marked="false" name="Master" owner="5957" />
  95. </stack>
  96.